#!C:\wamp\bin\perl\bin\perl

use lib('lib');

use strict;
use Data::Dumper;
use NES;

_main();
exit 0;

sub _main {
    my $nes = NES->new();
    # $nes->load_file('___temp/tennis.nes');
    # $nes->load_file('___temp/kong.nes');
    $nes->load_file('___temp/balloon.nes');
    # $nes->load_file('___temp/demo.nes');
    $nes->loop();
}